(shell-mode-hook): Set comint-completion-addsuffix

so that the directory suffix is backslash and the file suffix is space.

diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el
index 9b6046b4f13dd040919a9f3f107ceaa4d1e405f0..e649101c5a9627f9928a63885640c937b7dabf60 100644 (file)
--- a/lisp/w32-fns.el
+++ b/lisp/w32-fns.el
@@ -63,6 +63,10 @@
 ;; for executing its command line argument (from simple.el).
 (setq shell-command-switch "/c")
 
+;; For appending suffixes to directories and files in shell completions.
+(add-hook 'shell-mode-hook 
+         '(lambda () (setq comint-completion-addsuffix '("\\" . " "))))
+
 ;; Use ";" instead of ":" as a path separator (from files.el).
 (setq path-separator ";")